#include <Rcpp.h>
using namespace Rcpp;

// [[Rcpp::export]]
int testnrow(NumericMatrix x){
  int n = 0;
  n = x.ncol();
  return n;
}

// [[Rcpp::export]]
NumericVector testsubset(NumericVector x, IntegerVector y){
  return x[(seq_along(y)-1)];
}

